Januari 13, 2021

Why am i (pseudo)researching this?

There are a few reasons

  • I like drinking beer
  • I was in the mood to draw some random values from a normal distribution
  • I read that consumption of low-alcohol and non-alcoholic beers can avoid possible health threatening issues related to excessive alcohol intake.(Sohrabvandi, Mortazavian, & Rezaei, 2012)

Some plots to illustrate possible relationships

First:g the relationship between my feelings and hangovers

Now my Hangover per type of beer

We check these findings through using a regression analysis

A linear regression analysis

  hangover
Predictors Estimates CI p
(Intercept) 4.32 -7.78 – 16.42 0.457
feelings 0.18 -1.51 – 1.87 0.822
type [Pilsener] -0.49 -4.11 – 3.13 0.775
type [Quad] 2.01 -4.76 – 8.79 0.534
type [Triple] -1.55 -5.37 – 2.27 0.398
type [White] -0.45 -5.59 – 4.68 0.853
Observations 20
R2 / R2 adjusted 0.102 / -0.219

Note. “Blond” beer is used as reference here

These are the resulting equations for each of the different types of beer

\[ \begin{aligned} Hangover_i &= 4.32 + Feelings_i*0.18 (Blond) \\ Hangover_i &= 4.32 + Feelings_i*0.18 - 0.49(Pilsener)\\ Hangover_i &= 4.32 + Feelings_i*0.18 + 2.01(Quad)\\ Hangover_i &= 4.32 + Feelings_i*0.18 -1.55(Triple)\\ Hangover_i &= 4.32 + Feelings_i*0.18-0.45(White) \end{aligned} \]

Next we show the data on which the plot and analyses are based

The dataframe, as presented through a datatable

The data was created through the following r-code

# data creation
set.seed(100)
type<-sample(c("White","Blond","Triple",
               "Pilsener","Quad"),20,replace=TRUE)
feelings<-rnorm(20,7,1)
bottle<-sample(c("regular","large","small"),20,replace=TRUE)
hangover<-rnorm(20,5,2)
data<-data.frame(type,feelings,bottle,hangover)

Now for a two-collumn page, to flex our programming skills

Some conclusions

  • Beer is nice
  • My feelings and the type of beer i drink are not related to my hangovers
  • This study might show some methodological shortcomings
  • I hope you can enjoy a nice (cold) beer after reading this

That’s all folks

References

Sohrabvandi, S., Mortazavian, A., & Rezaei, K. (2012). Health-related aspects of beer: A review. International Journal of Food Properties, 15(2), 350–373.